object YFytGorForm: TYFytGorForm Left = 60 Top = 5 Width = 513 Height = 437 ActiveControl = DBGrid1 Caption = 'Yeni Fiyat Listesi' Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] Position = poScreenCenter OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 14 object Panel2: TPanel Left = 0 Top = 0 Width = 505 Height = 410 Align = alClient BevelInner = bvLowered BorderWidth = 4 Caption = 'Panel2' Color = clPurple TabOrder = 0 object Label1: TLabel Left = 66 Top = 337 Width = 36 Height = 14 Caption = 'Label1' Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False Visible = False end object Label2: TLabel Left = 10 Top = 336 Width = 51 Height = 14 Caption = 'ARANAN :' Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False Visible = False end object Label3: TLabel Left = 320 Top = 343 Width = 106 Height = 14 Caption = 'Yaz�c� Sol Marj (cm)' Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False end object LabelIs: TLabel Left = 14 Top = 351 Width = 40 Height = 14 Caption = 'LabelIs' Font.Color = clWhite Font.Height = -11 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False end object DBGrid1: TDBGrid Left = 6 Top = 6 Width = 493 Height = 328 Align = alTop DataSource = DataSource1 FixedColor = clSilver Font.Color = clBlack Font.Height = -11 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False TabOrder = 0 TitleFont.Color = clNavy TitleFont.Height = -11 TitleFont.Name = 'Arial Tur' TitleFont.Style = [fsBold] OnKeyDown = DBGrid1KeyDown OnKeyPress = DBGrid1KeyPress end object BtnFont: TBitBtn Left = 272 Top = 370 Width = 95 Height = 27 Caption = 'Yaz�& Fontu' Font.Color = clNavy Font.Height = -12 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnClick = BtnFontClick Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333FF3FFFFFFF33FFF003000000033 0000773777777733777703330033033330037FFF77F37F33377F700007330333 3003777777337FFFF77F303003337000007337F77F3377777773303073333033 003337F77F3337F377F337007333303300333777733337FF77F3330033333703 07333377F333377F7733330733333300033333773FF3F3777F33333399393300 033333337737FF777F333333339993307333333333777FF77333333333999930 3333333333777737333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 end object BtnYAZ: TBitBtn Left = 158 Top = 370 Width = 95 Height = 27 Caption = '&Yaz�c�' Font.Color = clNavy Font.Height = -12 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnClick = BtnYAZClick Glyph.Data = { 78010000424D7801000000000000760000002800000020000000100000000100 04000000000000000000120B0000120B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF77333333333000000333333333377777733333330000} NumGlyphs = 2 end object BitBtn3: TBitBtn Left = 386 Top = 370 Width = 95 Height = 27 Caption = 'Kapat' Font.Color = clNavy Font.Height = -12 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False TabOrder = 5 Kind = bkClose end object SpinEdit1: TSpinEdit Left = 431 Top = 339 Width = 44 Height = 23 MaxLength = 25 MaxValue = 0 MinValue = 0 TabOrder = 1 Value = 0 end object BitBtn1: TBitBtn Left = 17 Top = 370 Width = 122 Height = 27 Caption = '&Text Olarak Yaz' Font.Color = clNavy Font.Height = -12 Font.Name = 'Arial Tur' Font.Style = [fsBold] ParentFont = False TabOrder = 2 OnClick = BitBtn1Click Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00000000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF 07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF 0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0 33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 end end object DataSource1: TDataSource DataSet = FiyAktarTab Left = 303 Top = 85 end object FiyAktarTab: TTable AfterInsert = FiyAktarTabAfterInsert AfterEdit = FiyAktarTabAfterInsert AfterPost = FiyAktarTabAfterPost OnPostError = FiyAktarTabPostError DatabaseName = 'ECZ' IndexFieldNames = 'ILACAD' TableName = 'Yenifyt.db' Left = 268 Top = 85 object FiyAktarTabILACAD: TStringField DisplayLabel = '�r�n Ad�' FieldName = 'ILACAD' ReadOnly = True Required = True Size = 36 end object FiyAktarTabILACKOD: TStringField DisplayLabel = 'Bar Kodu' FieldName = 'ILACKOD' Size = 13 end object FiyAktarTabFIYAT: TCurrencyField DisplayLabel = 'Yeni Fiyat' DisplayWidth = 16 FieldName = 'FIYAT' end object FiyAktarTabFITARIH: TDateField Alignment = taRightJustify DisplayLabel = 'Fyt.Trh.' DisplayWidth = 8 FieldName = 'FITARIH' DisplayFormat = 'dd/mm/yy' end end object FontDialog1: TFontDialog Font.Color = clBlack Font.Height = -11 Font.Name = 'Courier New Tur' Font.Style = [] Device = fdBoth MinFontSize = 0 MaxFontSize = 0 Options = [fdEffects, fdFixedPitchOnly] Left = 256 Top = 280 end object PrintDialog1: TPrintDialog Left = 312 Top = 280 end object FontTab: TTable DatabaseName = 'ECZ' TableName = 'FONT.DB' Left = 192 Top = 272 object FontTabBIRIM: TStringField FieldName = 'BIRIM' Size = 9 end object FontTabFONTADI: TStringField FieldName = 'FONTADI' Size = 35 end object FontTabFONTSIZE: TSmallintField FieldName = 'FONTSIZE' end object FontTabCOLOR: TIntegerField FieldName = 'COLOR' end object FontTabSTYLE: TStringField FieldName = 'STYLE' Size = 1 end object FontTabMARJIN: TSmallintField FieldName = 'MARJIN' end end object Table1: TTable DatabaseName = 'ECZ' TableName = 'FIYATGOR' TableType = ttASCII Left = 272 Top = 144 end object BatchMove1: TBatchMove Destination = Table1 Mappings.Strings = ( 'ILACAD=ILACAD' 'FITARIH=FITARIH' 'FIYAT=FIYAT') Mode = batCopy Source = FiyAktarTab Left = 272 Top = 112 end end